home *** CD-ROM | disk | FTP | other *** search
-
-
-
- FFFFiiiilllleeee::::::::DDDDoooossssGGGGlllloooobbbb((((3333)))) 7777////AAAAuuuugggg////99998888 ((((ppppeeeerrrrllll 5555....000000005555,,,, ppppaaaattttcccchhhh 00002222)))) FFFFiiiilllleeee::::::::DDDDoooossssGGGGlllloooobbbb((((3333))))
-
-
-
- NNNNAAAAMMMMEEEE
- File::DosGlob - DOS like globbing and then some
-
- SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
- require 5.004;
-
- # override CORE::glob in current package
- use File::DosGlob 'glob';
-
- # override CORE::glob in ALL packages (use with extreme caution!)
- use File::DosGlob 'GLOBAL_glob';
-
- @perlfiles = glob "..\\pe?l/*.p?";
- print <..\\pe?l/*.p?>;
-
- # from the command line (overrides only in main::)
- > perl -MFile::DosGlob=glob -e "print <../pe*/*p?>"
-
-
- DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
- A module that implements DOS-like globbing with a few
- enhancements. It is largely compatible with perlglob.exe
- (the M$ setargv.obj version) in all but one respect--it
- understands wildcards in directory components.
-
- For example, <..\\l*b\\file/*glob.p?> will work as expected
- (in that it will find something like
- '..\lib\File/DosGlob.pm' alright). Note that all path
- components are case-insensitive, and that backslashes and
- forward slashes are both accepted, and preserved. You may
- have to double the backslashes if you are putting them in
- literally, due to double-quotish parsing of the pattern by
- perl.
-
- Spaces in the argument delimit distinct patterns, so
- glob('*.exe *.dll') globs all filenames that end in .exe or
- .dll. If you want to put in literal spaces in the glob
- pattern, you can escape them with either double quotes, or
- backslashes. e.g. glob('c:/"Program Files"/*/*.dll'), or
- glob('c:/Program\ Files/*/*.dll'). The argument is
- tokenized using Text::ParseWords::parse_line(), so see the
- _T_e_x_t::_P_a_r_s_e_W_o_r_d_s manpage for details of the quoting rules
- used.
-
- Extending it to csh patterns is left as an exercise to the
- reader.
-
- EEEEXXXXPPPPOOOORRRRTTTTSSSS ((((bbbbyyyy rrrreeeeqqqquuuueeeesssstttt oooonnnnllllyyyy))))
- _g_l_o_b()
-
- BBBBUUUUGGGGSSSS
- Should probably be built into the core, and needs to stop
-
-
-
- Page 1 (printed 10/23/98)
-
-
-
-
-
-
- FFFFiiiilllleeee::::::::DDDDoooossssGGGGlllloooobbbb((((3333)))) 7777////AAAAuuuugggg////99998888 ((((ppppeeeerrrrllll 5555....000000005555,,,, ppppaaaattttcccchhhh 00002222)))) FFFFiiiilllleeee::::::::DDDDoooossssGGGGlllloooobbbb((((3333))))
-
-
-
- pandering to DOS habits. Needs a dose of optimizium too.
-
- AAAAUUUUTTTTHHHHOOOORRRR
- Gurusamy Sarathy <gsar@umich.edu>
-
- HHHHIIIISSSSTTTTOOOORRRRYYYY
- +o Support for globally overriding _g_l_o_b() (GSAR 3-JUN-98)
-
- +o Scalar context, independent iterator context fixes (GSAR
- 15-SEP-97)
-
- +o A few dir-vs-file optimizations result in glob
- importation being 10 times faster than using
- perlglob.exe, and using perlglob.bat is only twice as
- slow as perlglob.exe (GSAR 28-MAY-97)
-
- +o Several cleanups prompted by lack of compatible
- perlglob.exe under Borland (GSAR 27-MAY-97)
-
- +o Initial version (GSAR 20-FEB-97)
-
- SSSSEEEEEEEE AAAALLLLSSSSOOOO
- perl
-
- perlglob.bat
-
- Text::ParseWords
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- Page 2 (printed 10/23/98)
-
-
-
-